object OknoGlowne: TOknoGlowne
  Left = 234
  Top = 69
  Width = 550
  Height = 468
  Caption = 
    'Poeta                               Copyright by Derbeth <http:/' +
    '/derbeth.glt.pl>'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 90
    Height = 441
    Align = alLeft
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    object PiszBtn: TBitBtn
      Left = 5
      Top = 8
      Width = 81
      Height = 25
      Hint = 'Pisz strof'#281' wiersza'
      Caption = '&Pisz strof'#281
      Default = True
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnClick = PiszClick
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777777777777777700000000077777777777777700777777777777770007
        7777777777770B807777777777770B7087777777777780B807777777777770B7
        087777777777780B807777777777770B7087777777777780B807777777777770
        B008777777777778011077777777777700077777777777777777}
    end
    object ZapiszBtn: TBitBtn
      Left = 5
      Top = 104
      Width = 81
      Height = 25
      Hint = 'Zapisz wy'#347'wietlany wiersz'
      Caption = '&Zapisz'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      OnClick = Zapisz
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777770000000000000770330000007703077033000000770307703300000077
        0307703300000000030770333333333333077033000000003307703077777777
        0307703077777777030770307777777703077030777777770307703077777777
        0007703077777777070770000000000000077777777777777777}
    end
    object InfoBox: TMemo
      Left = 2
      Top = 361
      Width = 86
      Height = 78
      Hint = 'Kliknij dwukrotnie aby wy'#347'wietli'#263' informacje o pliku s'#322'ownika'
      TabStop = False
      Align = alBottom
      Font.Charset = EASTEUROPE_CHARSET
      Font.Color = clWindowText
      Font.Height = -9
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = True
      ParentFont = False
      ParentShowHint = False
      ReadOnly = True
      ShowHint = True
      TabOrder = 3
      OnDblClick = TestujGramatyke
    end
    object WyczyscBtn: TBitBtn
      Left = 5
      Top = 40
      Width = 81
      Height = 25
      Hint = 'Wyszy'#347#263' obszar pisania'
      Caption = '&Wyczy'#347#263
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnClick = Wyczysc
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777777777777777777777777777777777800000087777777707777770077
        7777707777770807777778077777088077777707F7F7F088077777707F7F7F08
        8077777707F7F7F088877777707F7F7F080777777707F7F7F807777777707F7F
        7707777777778000088777777777777777777777777777777777}
    end
    object SlownikBtn: TBitBtn
      Left = 5
      Top = 72
      Width = 81
      Height = 25
      Hint = 'Za'#322'aduj plik s'#322'ownika'
      Caption = '&S'#322'ownik'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 4
      OnClick = SlownikBtnClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
        333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
        C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
        F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
        F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
        00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
        3333333373FF7333333333333000333333333333377733333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
    end
  end
  object Kartka: TMemo
    Left = 90
    Top = 0
    Width = 452
    Height = 441
    TabStop = False
    Align = alClient
    Alignment = taCenter
    BiDiMode = bdLeftToRight
    Font.Charset = EASTEUROPE_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Trebuchet MS'
    Font.Style = []
    ParentBiDiMode = False
    ParentFont = False
    ReadOnly = True
    ScrollBars = ssVertical
    TabOrder = 1
    OnKeyPress = KartkaKeyPress
  end
  object XPManifest1: TXPManifest
    Left = 48
    Top = 208
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = 'txt'
    Filter = 'wszystkie pliki (*.*)|*|pliki tekstowe (*.txt)|*.txt'
    FilterIndex = 2
    Left = 8
    Top = 200
  end
  object OpenDialog1: TOpenDialog
    Filter = 'pliki s'#322'ownika (*.pdm)|*.pdm'
    Left = 16
    Top = 240
  end
end
